perm filename SOSMAC.FAI[CMS,LCS] blob
sn#345094 filedate 1978-03-30 generic text, type T, neo UTF8
00100 ; FAIL MACROS FOR 8748
00200
00300 LOC 274
00400 PHASE 0
00500
00600 DEFINE ADR (R) < 150 ∨ (R ∧ 7) >
00700 DEFINE ADM (R) < 140 ∨ (R ∧ 1) >
00800 DEFINE ADI (E) < 3 ↔ E∧377 >
00900
01000 DEFINE ADCR (R) < 170 ∨ (R ∧ 7) >
01100 DEFINE ADCM (R) < 160 ∨ (R ∧ 1) >
01200 DEFINE ADCI (E) < 23 ↔ E∧377 >
01300
01400 DEFINE ANR (R) < 130 ∨ (R ∧ 7) >
01500 DEFINE ANM (R) < 120 ∨ (R ∧ 1) >
01600 DEFINE ANI (E) < 123 ↔ E∧377 >
01700
01800 DEFINE ANBI (E) < 230 ↔ E∧377 >
01900 DEFINE ANPI (P,E) < 230 ∨ (P ∧ 3) ↔ E∧377 >
02000 DEFINE ANPA (P,E) < 234 ∨ (P ∧ 3) ↔ E∧377 >
02100
02200 DEFINE CALL (E) < 24 ∨ (E⊗-3 ∧ 340) ↔ E∧377 >
02300
02400 DEFINE CLRA < 47 >
02500 DEFINE CLRC < 227 >
02600 DEFINE CLRF1 < 245 >
02700 DEFINE CLRF0 < 205 >
02800 DEFINE CPLA < 67 >
02900 DEFINE CPLC < 247 >
03000 DEFINE CPLF0 < 225 >
03100 DEFINE CPLF1 < 265 >
03200 DEFINE DAA < 127 >
03300
03400 DEFINE DECA < 7 >
03500 DEFINE DECR (R) < 310 ∨ (R ∧ 7) >
03600
03700 DEFINE DISXI < 25 >
03800 DEFINE DISTI < 65 >
03900
04000 DEFINE DJNZ (R,E) < 350 ∨ (R ∧ 7) ↔ E∧377 >
04100
04200 DEFINE ENXI < 5 >
04300 DEFINE ENTI < 45 >
04400 DEFINE ENCLK < 165 >
04500
04600 DEFINE INP (P) < 10 ∨ (P ∧ 3) >
04700
04800 DEFINE INCA < 27 >
04900 DEFINE INCR (R) < 30 ∨ (R ∧ 7) >
05000 DEFINE INCM (R) < 20 ∨ (R ∧ 1) >
05100
05200 DEFINE INB < 10 >
00100 DEFINE JBS (B,E) < 22 ∨ (B⊗4) ∧377 ↔ E∧377 >
00200 DEFINE JCS (E) < 366 ↔ E∧377 >
00300 DEFINE JF0S (E) < 266 ↔ E∧377 >
00400 DEFINE JF1S (E) < 166 ↔ E∧377 >
00500
00600 DEFINE JMP (E) < 4 ∨ (E⊗-3 ∧ 340) ↔ E∧377 >
00700 DEFINE JMPIN (E) < 263 >
00800 DEFINE JCC (E) < 346 ↔ E∧377 >
00900 DEFINE JINT (E) < 206 ↔ E∧377 >
01000 DEFINE JT0L (E) < 46 ↔ E∧377 >
01100 DEFINE JT1L (E) < 106 ↔ E∧377 >
01200
01300 DEFINE JNZ (E) < 226 ↔ E∧377 >
01400 DEFINE JTF (E) < 26 ↔ E∧377 >
01500 DEFINE JT0H (E) < 66 ↔ E∧377 >
01600 DEFINE JT1H (E) < 126 ↔ E∧377 >
01700 DEFINE JZ (E) < 306 ↔ E∧377 >
01800
01900 DEFINE MOVI (E) < 43 ↔ E∧377 >
02000 DEFINE MOVPA < 307 >
02100 DEFINE MOVRA (R) < 370 ∨ (R ∧ 7) >
02200 DEFINE MOVMA (R) < 360 ∨ (R ∧ 1) >
02300 DEFINE MOVTA < 102 >
02400
02500 DEFINE MOVAP < 327 >
02600 DEFINE MOVAR (R) < 250 ∨ (R ∧ 7) >
02700 DEFINE MOVRI (R,E) < 270 ∨ (R ∧ 7) ↔ E∧377 >
02800 DEFINE MOVAM (R) < 240 ∨ (R ∧ 1) >
02900 DEFINE MOVMI (R,E) < 260 ∨ (R ∧ 1) ↔ E∧377 >
03000
03100 DEFINE MOVAT < 142 >
03200 DEFINE MOVXA (P) < 14 ∨ (P ∧ 3) >
03300 DEFINE MOVAX (P) < 74 ∨ (P ∧ 3) >
03400 DEFINE MOVPD < 243 >
03500 DEFINE MOVP3 < 343 >
03600
03700 DEFINE MOVXMA (R) < 200 ∨ (R ∧ 1) >
03800 DEFINE MOVAXM (R) < 220 ∨ (R ∧ 1) >
03900 DEFINE NOP < 0 >
04000
04100 DEFINE ORR (R) < 110 ∨ (R ∧ 7) >
04200 DEFINE ORM (R) < 100 ∨ (R ∧ 1) >
04300 DEFINE ORI (E) < 103 ↔ E∧377 >
04400 DEFINE ORBI (E) < 210 ↔ E∧377 >
04500 DEFINE ORPI (P,E) < 210 ∨ (P ∧ 3) ↔ E∧377 >
04600 DEFINE ORXA (P) < 214 ∨ (P ∧ 3) >
00100 DEFINE OUTB < 2 >
00200 DEFINE OUTP (P) < 70 ∨ (P ∧ 3) >
00300 DEFINE RET < 203 >
00400 DEFINE RETR < 223 >
00500 DEFINE ROL < 347 >
00600 DEFINE ROLC < 367 >
00700 DEFINE ROR < 167 >
00800 DEFINE RORC < 147 >
00900
01000 DEFINE SMB0 < 345 >
01100 DEFINE SMB1 < 365 >
01200 DEFINE SRB0 < 305 >
01300 DEFINE SRB1 < 325 >
01400
01500 DEFINE STOPT < 145 >
01600 DEFINE STRTC < 105 >
01700 DEFINE STRTT < 125 >
01800 DEFINE SWAP < 107 >
01900
02000 DEFINE XCHAR (R) < 50 ∨ (R ∧ 7) >
02100 DEFINE XCHAM (R) < 40 ∨ (R ∧ 1) >
02200 DEFINE XCH4B (R) < 60 ∨ (R ∧ 1) >
02300
02400 DEFINE XORR (R) < 330 ∨ (R ∧ 7) >
02500 DEFINE XORM (R) < 320 ∨ (R ∧ 1) >
02600 DEFINE XORI (E) < 323 ↔ E∧377 >